VERSION 5.00 Begin VB.Form frmOLEDrag1 Caption = "OLEDrag1" ClientHeight = 4305 ClientLeft = 60 ClientTop = 345 ClientWidth = 5625 LinkTopic = "Form1" ScaleHeight = 4305 ScaleWidth = 5625 StartUpPosition = 3 'Windows Default Begin VB.PictureBox picDragTo AutoSize = -1 'True Height = 1770 Index = 2 Left = 3600 OLEDropMode = 2 'Automatic ScaleHeight = 1710 ScaleWidth = 1650 TabIndex = 6 Top = 2520 Width = 1710 End Begin VB.PictureBox picDragTo AutoSize = -1 'True Height = 1770 Index = 1 Left = 1800 OLEDropMode = 2 'Automatic ScaleHeight = 1710 ScaleWidth = 1650 TabIndex = 5 Top = 2520 Width = 1710 End Begin VB.PictureBox picDragTo AutoSize = -1 'True Height = 1770 Index = 0 Left = 0 OLEDropMode = 2 'Automatic ScaleHeight = 1710 ScaleWidth = 1650 TabIndex = 4 Top = 2520 Width = 1710 End Begin VB.PictureBox picDragFrom AutoRedraw = -1 'True AutoSize = -1 'True Height = 1770 Index = 3 Left = 1800 OLEDragMode = 1 'Automatic Picture = "OLEDrag1.frx":0000 ScaleHeight = 1710 ScaleWidth = 1395 TabIndex = 3 Top = 270 Width = 1455 End Begin VB.PictureBox picDragFrom AutoRedraw = -1 'True AutoSize = -1 'True Height = 1290 Index = 2 Left = 4680 OLEDragMode = 1 'Automatic Picture = "OLEDrag1.frx":7CF2 ScaleHeight = 1230 ScaleWidth = 870 TabIndex = 2 Top = 510 Width = 930 End Begin VB.PictureBox picDragFrom AutoRedraw = -1 'True AutoSize = -1 'True Height = 1110 Index = 1 Left = 3360 OLEDragMode = 1 'Automatic Picture = "OLEDrag1.frx":B594 ScaleHeight = 1050 ScaleWidth = 1155 TabIndex = 1 Top = 600 Width = 1215 End Begin VB.PictureBox picDragFrom AutoRedraw = -1 'True AutoSize = -1 'True Height = 1590 Index = 0 Left = 0 OLEDragMode = 1 'Automatic Picture = "OLEDrag1.frx":CFB6 ScaleHeight = 1530 ScaleWidth = 1650 TabIndex = 0 Top = 360 Width = 1710 End Begin VB.Label Label1 Caption = "Drag to:" Height = 255 Index = 1 Left = 0 TabIndex = 8 Top = 2160 Width = 1215 End Begin VB.Label Label1 Caption = "Drag from:" Height = 255 Index = 0 Left = 0 TabIndex = 7 Top = 0 Width = 1215 End Attribute VB_Name = "frmOLEDrag1" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Option Explicit